(eval-expression): Don't use eval-last-sexp-print-value

when inserting in buffer.

diff --git a/lisp/simple.el b/lisp/simple.el
index ac97d53d3bf64a5605c1a5353807c66568c6b6c9..8c03b919c597c87f1e76a342658f59a5bc2b5c67 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -1079,7 +1079,7 @@ this command arranges for all errors to enter the debugger."
     (if eval-expression-insert-value
        (with-no-warnings
         (let ((standard-output (current-buffer)))
-          (eval-last-sexp-print-value (car values))))
+          (prin1 (car values))))
       (prog1
           (prin1 (car values) t)
         (let ((str (eval-expression-print-format (car values))))